8 REM USR-VEKTOR
9 :
10 POKE785,163:POKE786,168
11 :
18 REM GOTO X
19 :
20 X=40+INT(RND(0)*3)*10
30 SYS47083(X),USR(0)
39 :
40 PRINT"40  ";:GOTO20
50 PRINT"50  ";:GOTO20
60 PRINT"60  ";:GOTO20